home *** CD-ROM | disk | FTP | other *** search
/ Merciful 1 / Merciful - Disc 1.iso / software / c / credit_text_scroller / credittextscroller.dms / in.adf / TASS / Macros / ASSIGN.REXX < prev    next >
Encoding:
OS/2 REXX Batch file  |  1990-08-29  |  323 b   |  18 lines
  1. /* Show current assigns */
  2.  
  3. arg arguments
  4. address 'REXX'
  5. parse source type result called resolved ext host garbage
  6.  
  7. if (arguments > '') then do
  8.    address command assign arguments
  9.    exit 0
  10.    end
  11.  
  12. address command 'assign >clips:assign'
  13. address(host) ; 'GetBool clips:assign'
  14. address command 'delete clips:assign'
  15.  
  16. exit 0
  17.  
  18.